ValueFolderTemp='C:\Users\Remy Neveu\Desktop\Etude IRM\Analyse\cc in2p3\Nature\ResultsJournal\';
ValueFolderTemp2='C:\Users\Remy Neveu\Desktop\Etude IRM\Analyse\cc in2p3\Nature\ResultsEditor\';
load([ValueFolderTemp 'ResultsThirdLevelDistributionOutliers.mat']);
VecDistribution=VecResults;
load('C:\Users\Remy Neveu\Desktop\Etude IRM\Analyse\cc in2p3\Nature\Results\NCoAuthorsEditors.mat');
VecResultsCoAuthorsTemp=VecResultsCoAuthors;
ValueCutoff=1.25;
VecFigure=[];
VecFigure2=[];
VecFigure3=[];
VecFigure5=[];
VecResultsCoAuthors=[];
VecResultsCoAuthors2=[];
VecResultsCoAuthors3=[];
VecResultsEditorsCoAuthorsTemp=zeros(1,4);
VecResultsEditorAfter=[];
VecResultsEditorBefore=[];
VecResultsEditorTemp2=[];
VecResultsEditorCoAuthors=[];
VecResultsEditorCoAuthors2=[];
VecResultsEditorJournal=[];
VecResultsEditorJournal2=[];
VecResultsTemp5Temp=[];
VecA=192:1:198;
VecA=[VecA 65];
Veca=224:1:230;
Veca=[Veca 97];
VecC=[199 67];
Vecc=[231 99];
VecE=200:203;
VecE=[VecE 69];
Vece=232:1:235;
Vece=[Vece 101];
VecI=204:207;
VecI=[VecI 73];
Veci=236:1:239;
Veci=[Veci 105];
Vecn=[241 110];
VecO=210:214;
VecO=[VecO 216 79];
Veco=242:1:246;
Veco=[Veco 248 111];
VecU=217:1:220;
VecU=[VecU 85];
Vecu=249:1:252;
Vecu=[Vecu 117];
VecY=[221 89];
Vecy=[253 121];
Vecs=[223 115];
VecSpecialCharacters=[{VecA} {Veca} {VecC} {Vecc} {VecE} {Vece} {VecI} {Veci} {Vecn} {VecO} {Veco} {VecU} {Vecu} {VecY} {Vecy} {Vecs}];
VecResults=[];
VecResults2=[];
for n1=1:323
    n1
    ValueTemp=find(VecDistribution(:,1)==n1);
    if size(ValueTemp,1)==1&&n1~=11
        if VecDistribution(ValueTemp,2)<=ValueCutoff
            load([ValueFolderTemp2 'ResultsCharacteristicsEditor' num2str(n1) '.mat']);
            for n2=1:size(VecGroupCoAuthors,1)
                ValueTemp=VecGroupCoAuthors{n2,1}+1;
                for n3=2:ValueTemp
                    [ValueResult1,ValueResult2]=checkAuthorsEditorsNature3(ValueTemp,VecGroupCoAuthors,VecSpecialCharacters,n2,n3);
                    VecResults=[VecResults;n2 n3 ValueResult1 ValueResult2 n1];
                end
            end
            [ValueResult1,ValueResult2,ValueResult3,ValueResult4]=checkAuthorsEditorsNature4(VecGroupCoAuthors);
            VecResults2=[VecResults2;ValueResult1 ValueResult2 ValueResult3 ValueResult4 size(VecGroupCoAuthors,1) size(VecGroupCoAuthors,2) n1];
        end
    end
end
